home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Cream of the Crop 21
/
Cream of the Crop 21 (Terry Blount) (October 1996).iso
/
program
/
multlang.zip
/
DTC.DFM
/
DTC.txt
Wrap
Text File
|
1996-06-10
|
4KB
|
175 lines
object DTCDlg: TDTCDlg
Left = 273
Top = 147
BorderStyle = bsDialog
Caption = 'Date / Time / Currency'
ClientHeight = 272
ClientWidth = 368
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
FormStyle = fsMDIChild
Position = poScreenCenter
Visible = True
OnClose = FormClose
PixelsPerInch = 96
TextHeight = 13
object Bevel2: TBevel
Left = 4
Top = 176
Width = 361
Height = 89
end
object Label1: TLabel
Left = 4
Top = 4
Width = 361
Height = 73
Alignment = taCenter
AutoSize = False
Caption =
'The TMultLang component have properties to adjust regional setti' +
'ngs. Without changing any Control Panel Settings and regardless ' +
'of the Windows version running. Compatible with Win 3.1, 95 and ' +
'NT'
Font.Color = clBlack
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label3: TLabel
Left = 12
Top = 88
Width = 345
Height = 29
AutoSize = False
Caption =
'The Long Date and Time format can displayed in the proper format' +
' with the FormatDateTime function.'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object LabelLongDate: TLabel
Left = 12
Top = 144
Width = 169
Height = 17
AutoSize = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object LabelLongTime: TLabel
Left = 200
Top = 144
Width = 137
Height = 17
AutoSize = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 12
Top = 184
Width = 345
Height = 29
AutoSize = False
Caption =
'The Currency format can displayed in the proper format with the ' +
'Format function.'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object LabelCurrency: TLabel
Left = 12
Top = 240
Width = 309
Height = 17
AutoSize = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 200
Top = 124
Width = 137
Height = 17
AutoSize = False
Caption = 'FormatDateTime('#39'tt'#39', Now);'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label5: TLabel
Left = 12
Top = 124
Width = 165
Height = 17
AutoSize = False
Caption = 'FormatDateTime('#39'dddddd'#39', Now);'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 12
Top = 220
Width = 165
Height = 17
AutoSize = False
Caption = 'Format('#39'%m'#39', [AValue]);'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Bevel1: TBevel
Left = 4
Top = 80
Width = 361
Height = 89
end
object MultLang1: TMultLang
Left = 280
Top = 4
Width = 57
Height = 22
AlignIcon = alLeft
AlignText = alLeft
IconMargin = 1
ItemHeight = 16
Items.Strings = (
'English'
'Swedish')
ShowIcons = False
Text = 'English'
ResizeIcon = False
TextMargin = 5
DefaultLanguage = 'English'
LanguageFile = '%EXEPath%Mdiapp.lan'
OnTranslated = MultLang1Translated
LanguagesData = {}
end
end